figure (1);
hold on;
%b = [1132 1248 1673 1726 1744 1778 1833 1862 1881 1925 2014 2019 2042 2110 2120 2127 2241 2287 2401 2591 2758 2829 3257 3319 3486 3846 4063 4116 4148 4195 4372 460 4846 5038 5375 5598 5807 5953 5969 5971 5975 6181 6182 6199 6200 6217 6218 6223 6276 6307 6372 6538 6658 6782 6802 7065 7092 759];
%c = ['b-' 'c-' 'r-' 'c-' 'm-'];
c = [2288	6201	1882	3320	3847	461	1249	1745	1834	2020	2043	2111	2242	2402	2759	3258	4196	4847	5039	6200	6990	2	5	6	8	12	13	14	18	22];
for i= 1:30
plot (a(:,c(i)),'-');
end
plot (a(:,4052),'r-');
hold off;
